home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr18
/
alad170.zip
/
DATEX-P.SCR
< prev
next >
Wrap
Text File
|
1993-06-30
|
689b
|
39 lines
SCRIPT # DATEX-P Logon
ECHO OFF
HHH OFF
;Configuration
SETSTRING 1 "#######" | Local DATEX-P number
SETSTRING 2 "ATZ" | Modem reset
SETSTRING 3 "ATDP" | Dial command
SETSTRING 4 "R ##########" | GEIS NUA code
;Use "R 45221040880" for GEIS NUA for WestGermany
;Use "R 26191115" for GEIS NUA for Austria
SENDLINE "%2"
WAITFOR "OK"
:DIAL
PAUSE 1
SENDLINE "%3%1"
PAUSE 1
WAITFOR "^M"
WAITFOR "^M"
IF CURRENTLINEHAS "NO"
GOTO DIAL
ENDIF
IF CURRENTLINEHAS "BUSY"
GOTO DIAL
ENDIF
PAUSE 5
SEND "."
PAUSE 1
SEND "^M"
PAUSE 5
SENDLINE "SET 2:0,5:1,12:1"
PAUSE 2
SENDLINE "%4"
PAUSE 1
ENDSRIPT